100 FORN=0TO5:READX:POKE828+N,X:NEXT
110 DATA32,89,166,76,174,167
120 POKE768,60:POKE769,3
130 POKE808,225